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APPENDIX C: MEMORY LOCATIONS USED BY BASIC 


9828 - 9821 Contains the start of BASIC program (source) 


8822 - 9823 Contains the next available memory location after 
the BASIC program (source) 


0824 - 9825 Contains the next available memory location after 
the BASIC source program and any defined variables 


0826 - 6827 Memory limit 


8828 - 8829 Contains the pointer for USER 


0038 - 6831 Contains the address of ‘the present arithmetic 
value in use during a USER call 

8108 Cold start address 

9183 Warm start address 

6106 Auto-run address 


9109 - B1BA Size of the BASIC interpreter 

018B Number of the control port 

§18C - 916D Maximum memory size available for BASIC to use. 
O19E - O16F . Address of home clear end-of-frame string 

116 - 6111 Address of carriage returnline feed string 

8112 - #113 Address of ERROR routine (Error in ACCB) 


9114 - 613A RESERVED for future jump addresses 


013B Line delete control character (CTL X) 

613C Character delete control character (CTL H) 
013D Character delete ECHO character (NULL) 
Q13E BREAK control character (CTL C) 

Q13F Jump Table 


NOTE: The last 256 bytes of memory available are used as a 
string expression buffer and for the machine stack. 


AG4A - AOTF Part of this area is used by DOS68. See the DOS68 
reference manual for the actual addresses used. 


APPENDIX D: ERROR MESSAGES 


The following is printed when an error occurs: 


ERROR # ----~ IN LINE # ----- <_ | 


The line number will be 6999 for errors in direct mode execution, 


ERROR MEANING 


G2 
63 
G4 
05 
06 
67 
08 
09 
16 
ll 
12 
13 
14 
15 
16 


Maximum variable length exceeded (over 255) 

Input error 

Illegal character or variable 

Missing ending " in print literal 

Dimension error 

Illegal arithmetic 

Line number not found 

Attempt to divide by @ 

Maximum subroutine nesting exceeded (over 8 levels) 
RETURN statement executed without a prior GOSUB 
Illegal variable 

Unrecognizable statement - also common disc command error 
Parenthesis error 

Memory full 

Subscript error 

Too many FOR-NEXT loops active (maximum is 8) 

NEXT X statement without prior FOR X=... 

Nesting error in FOR-NEXT 

Error in READ statement 

Error in ON statement 

Input overflow (more than 8@ characters on input line) 
Syntax error in DEF statement 

FN function error. Either syntax error in FN or FN is not defined. 
Error in STRING usage, or mixing of numeric and string variables 
String buffer overflow, or string extract too long 
Not used in Logical I/O Basic 

VAL function error - string starts with a non-numeric character 
Cannot take LOG of a negative number 

Error message error 

File number is not in range of @ through 9 

Unable to open file for write 

Attempt to write to file not open for write 

Unable to open file for read 

Attempt to read from a file not open for read 

Attempt to read data beyond end of file 

Specified file failed to close 

Specified file failed to delete 

Disk Directory error 

Disk unit (drive) number error 

Diskname (FREN) error 

Memory error 


Error numbers 60-69 indicate that DFM (the disc file handler) has 
detected an error in handling the file number corresponding to 
the least significant digit of the number 40-49. DFM's own error 


code 


will also be displayed (see the BFD-68 system manual for O 


value of the DFM error codes). 
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INTRODUCTION 


SSB's Disk File Handling BASIC, DFB-68, was written to conform 
closely to the proposed ANSI standard, thus allowing the user to 
run standard BASIC programs with few, if any, changes. In 
addition, many new commands have been added to make programming 
easier, and to keep your source code to a minimum, SSB BASIC 
supports many transcendental funttions, allows programs and data 
to be saved on disc, and implements file handling capability. 


Complete documentation for input and output character routines is 
provided so as to allow easy adaptation for special I/O features. 


BASIC is distributed in three versions. These are named on the 
disk as follows: 


BASIC.$ for use with DOS68 in the $6898-S7FFF range 
BASICA.$ for use with DOS68 in the SAQ@9-SBFFF range 
BASICC.$ for use with DOS68 in the S$COOG-SDFFF range 


To run BASIC, simply put the disk containing BASIC into drive 9@ 
and type BASIC followed by a carriage return. (This assumes you 
are using DOS68 at S$6600~S7FFF.) 


LICENSE 


The Smoke Signal BASIC, in all machine readable formats, and 
written documentation accompanying them are copyrighted. The 
purchase of SSB BASIC, or _ the purchase of a disc system with 
which SSB BASIC is distributed without additional charge, conveys 
to the purchaser a license to copy BASIC for his/her own use on 
any disc system manufactured by Smoke Signal Broadcasting, and 
not for sale or free distribution to others. No other license, 
expressed or implied is granted, 


WARRANTEE INFORMATION 


The license to use SSB BASIC is sold AS IS without warrantee. 
This warrantee is in lieu of all other warrantees expressed or 
implied. Smoke Signal Broadcasting does not warrant’ the 
suitability of BASIC for any particular user application and will 
not be responsible for damages incidental to its use in a user 
system. 
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MODES OF EXECUTION 


BASIC has two modes of execution - the immediate (or direct) mode 
and the program mode. In the program mode, BASIC executes a_ set 
of instructions that has been stored prior to execution. In the 
immediate mode, BASIC executes commands at the time they are 
entered from the terminai, 


The BASIC interpreter determines whether a statement is intended 
for immediate execution or for storage as part of the program 
solely on the basis of whether or not the statement was entered 
with a line number, Statements having line numbers are stored 
for later execution; these without line numbers are executed 
immediately. Thus the iine: 

18 PRINT "SSB BASIC" 


will produce no response at the terminal until the program is 
executed. The line: 


PRINT "SSB BASIC" 
however, causes the terminal to respond immediately with: 
SSB BASIC 


By using statements without line numbers BASIC can be used as a 
sophisticated calculator, For example, 


PRINT (17*2..83; * (7/4) 
will cause BASIC to immediately respond with: 
89,14 


Another use for immediate mode execution is as an aid in program 
developement and debugging. Through the use of direct statement 
execution, program variables can be read or altered, and the 
program flow may be directly controlled. 
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PROGRAM STATEMENTS 


A BASIC program is made of a series of program lines. Each line 
must begin with a line number followed by one or more BASIC 
statements and terminated with a carriage return. The following 
are several rules that must be followed in writing a BASIC 
program: 


l. Every line must have a line number ranging between 1 and 
9999, Line number @ may not be used, 


2e Line numbers are used by BASIC to arrange the program lines 
sequentially. The program will be executed in order of 
increasing line number regardless of the order in which they 
where entered, 


3s A line number may be used only once in any given program. 


4. A previously entered line may be changed by simply 
re-entering the same line number along with the corrected 
line. Typing a line number’ followed immediately by a 
Carriage return deletes that line, 


De Program lines need not be entered in numerical order because 
BASIC will automatically put them in ascending order. 


6. A line cannot contain more than 8@ characters including 
spaces. 


7. Spaces are not processed by BASIC unless they are part of a 
character string (i.e., enclosed in quotation marks). The 
use of spaces is optional. The line 1@ LET A = 186 is 
the same as the line I@LETA=18. Spaces make the line more 
readable, but take longer for the interperter to process and 
consume more memory. Numbers may not contain imbedded 
spaces. 


8. Multiple statements on a single line are permitted and must 
be separated by a colon ":", The statements are processed 
from left to right. For example: 


10 A=4: B=7: C=A+B: PRINT C 
is equivalent to: 

18 A=4 

28 B=7 


38 C=A+B 
46 PRINT C 
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DATA FORMAT 


The range of numbers that can be represented is 1.8 E-99 to 
9.99999999 E+99 where E+99 represents 18 to the power 99, 


Number are retained to an accuracy of nine decimal digits and are 
internally truncated (last digit dropped) to fit this format, 
Numbers may be entered and displayed in three formats: integer, 
decimal, and exponential. For example: 


1234 12.34 1234 E-2 


NUMERIC VARIABLES 


Variables are represented in a statement by any single alphabetic 
character or any single alphabetic character followed by a number 
@ through 9. 


Examples: xX, Y, 2, X3, Q8 


STRING VARIABLES 


String variables may contain a maximum of 128 characters. A 
string length command is available which allows .the maximum 
string length to be set at the beginning of the program. If the 
string length is not explicitly defined using the STRING command, 
BASIC assumes a string length of 32 characters. Refer to the 
STRING command description for a detailed description of its use, 


Examples of string variables: x$, y¥$(7), 2$(3,2) 
These string variables are all distinct from numeric variables 
having the same name. For example, X=902, X$="POLLY", Y(5)=23, 


and Y$(5)="CRACKERS" are all legal and may appear in the same 
program, 


STRING CONCATENATION 


Strings may be concatenated (joined together) using the 
concatenation symbol "+", 


For example: 
18 X$="SSB" 
28 Y$=" BASIC" 
38 ZS=X$ + Y$ 
40 PRINT 2Z$ 


Will print: SSB BASIC 


Oo 


s SSB BASIC 


The total length of the strings to be concatenated may not exceed 
the maximum string length either set by default or by the use of 
the STRING command. 


CONTROL FUNCTIONS 


Control characters such as CONTROL C or CONTROL X are typed by 
holding down the CTRL key while typing the specific letter. 
Control characters are not displayed on the terminal but are 
accepted by the computer. The control functions may be assigned 
different characters more suitable to the user's system. Refer 
to the appendices for specific details. 


BREAK 


Typing CONTROL C will cause BASIC to halt its current operation 
and to respond with "BASIC#". BASIC will then accept additional 
commands, CONTROL C may be used to stop a LIST operation which 
is in progress before it is completed, or to halt the execution 
of a program. If an MP-C card is being used as the terminal 
interface, the user may have to hit CONTROL C several times 
before the terminal will respond. 


LINE CANCEL 


Typing CONTROL X clears the current contents of the line buffer. 
If an error is made while making any entry on the terminal, 
either during program entry or data input during a program, this 
character can be used to delete the line, The user may then 
re-enter the line followed by a carriage return. Once a carriage 
return has been entered, however, the CONTROL X will no longer 
delete the line, 


BACKSPACE : - 


The CONTROL H (backspace) is used as a single character back 
space function, When a character has been typed in error, either 
during program entry or data input during a program, it may be 
corrected by typing the CONTROL H followed by the entry of the 
correct character. You may backspace as many character positions 
as necessary. 


REPEAT 


Typing CONTROL D will cause whatever is in BASIC'S input buffer 
to be again used as a line of input. This feature works in the 
immediate mode and its value is for the user to establish. 
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HALT 


With some of the operating systems (SMARTBUG), typing the rub-out 
character (Hex $7F) will cause processing to halt. This applies 
to both commands used in the immediate mode and while a program 
is running. To continue processing type any character but a 
rub-out or a CTL C. 


BASIC COMMANDS 


It is possible to communicate with the computer in BASIC by 
typing commands directly on the keyboard of the terminal. Also, 
many statements can be executed directly using the direct mode of 
operation described earlier. In addition, there are several 
commands which may be used by the operator in order to list 
programs, run programs, save or load programs, etc. When BASIC 
is ready to recieve commands, "BASIC#" will be displayed on the 
terminal. After each entry, the system will prompt the operator 
with a "#", 


Commands are typed on the terminal without using statement 
numbers. After the command has been executed, "BASIC#" will be 
displayed indicating that BASIC is ready to receive another 
command from the operator, 


LIST 


This command displays the lines of the current program on the 
terminal, The lines are listed in ascending numerical order by 
line number. A single line may be listed, or all lines within a 
given range may be listed, For example: 


LIST List the entire program. 

LIST 38 List only statement 38. 

LIST 38-199 List statements 38 through 108. 

LIST #4 List entire program on terminal/printer 


connected to I/O Port #4. 


RUN 


Typing RUN, followed by a carriage return, causes the program 
which is currently in memory to be executed starting with the 
lowest line numbered line. The RUN command resets all program 
parameters and initializes all variables to zero. 
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CONT 


The CONTinue command causes program execution to be resumed after 
a STOP statement has been executed, If a program has_ been 
interrupted using a "break" (control C) command, execution may be 
resumed by typing CONT followed by a carriage return. This 
command should not be used if a program error had been 
encountered or if the program has beem changed. The program 
parameters are not changed by this command. 


NEW 


This command causes the user program area and all variables and 
pointers to be reset. The effect of this command is to erase all 
traces of the previous program from memory in preparation for a 
new program. The SSB identification and BASIC version number 
will print, followed by "BASIC#". 


TRACE 


The TRACE feature is a useful debugging tool. Typing TRACE 
causes BASIC to display to the terminal the line number of each 
statement as it is executed. This allows the user to follow the 
sequence in which the program is being executed. Typing TRACE 
again returns the system to its normal mode of operation. The 
TRACE command may be inserted anywhere in the program, or 
executed in the direct mode. 


SIZE 


The SIZE command returns the following information to the control 
port: 


AVAIL= (size of available memory in decimal) 
PROG= (size of program in decimal) 
VAR= (size of variable storage area) 


MON 


This command causes the computer to return to the resident ROM 
monitor in the-computer system, In the case of MIKBUG this will 
output a carriage return, line feed, and the "*" prompt 
character. If the program counter address (stored in $A648 and 
$A049) is not altered, then typing "G" will restart BASIC leaving 
the user's BASIC program intact. The MON command may be inserted 
as a statement within a BASIC program. 
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DOS 


The DOS command functions identically as MON except that control 
is return to DOS68. 


PORT 


The command PORT = N defines the I/O port which will serve as 
the control port. N can be a constant, a variable, or an 
expression. All messages, including BASIC's "BASIC#" will be 
sent to the port assigned by the PORT command and the BASIC 
program will expect all input from that port. 


BEWARE 
If a port without a terminal is defined as 
the control port, you will lose control of 
your program. Breaks will always be accepted 
from the control port. 


FLIST 


The FLIST (file list) command allows the BASIC user to list the 
file names stored in the disk directory without exiting to DOS68. 
The format of this command is: FLIST [#<port -number>][,<unit 
number>]. Typing FLIST alone lists the files stored on disk drive 
@. FLIST 2 will list the file directory on disc 2. FLIST #4,1 
will list the disc file directory for disk drive 1 on port 4, 
FLIST will not list the transient commands found in the disk 
directory. 


FDEL 
The FDEL (file delete) command allows the user to delete disc 
files without exiting back to DOS68 to use the DELETE command. 
The format of the FDEL command is: FDEL,<file list>. 

FREN 
The FREN (file rename) command functions just as the DOS68 RENAME 


command does to change the name of a disc file. The command 
format is: FREN,<old file name>,<new file name>. 
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HOUSEKEEPING COMMANDS 


The following three commands, LINE, DIGITS, and STRING allow the 
user to define the associated parameters. Once these commands 
are used, the values assigned remain the same until the commands 
are used again or BASIC is reload from the disc, LINE and DIGITS 
can be used more than once during a program; STRING cannot. 
Although these parameters have default values, the default values 
are not asserted after each program. Once these commands are 
used, the values remain in affect until they are explicity 
changed. 


LINE 


The LINE command specifies the number of print positions ina 
line. For example, LINE = 4@ defines a line to be 46 characters 
long. While printing, if the next position is within the last 
25% of the line length and a space is printed, a carriage 
return/line feed will be issued. This is done so that a number 
or word will not be divided at the end of a print line. To 
inhibit this function, just set the line length equal to more 
than 125% of the actual desired line length. Setting the line 
length to zero also disables this function. 


DIGITS 


This command is used to specify the number of digits to be 
printed to the right of the decimal point. Any digits that 
appear beyond the number specified will be truncated. If there 
are not enough digits to fill the given length, zeros will be 
used. DIGITS = § resets the system to the floating point mode. 


STRING 


Executing the command STRING = N will set the maximum string 
length to N characters. BASIC will now reserve N bytes in memory 
for all string variables regardless of the actual number of 
characters which are entered for any particular variable. A 
maximum of 128 characters is allowed. If the STRING command is 
not used, BASIC will assume the default value of 32 characters. 
The STRING command can be used only once during a program and, if 
used, must appear before'reference to any string variable is 
made. For these reasons the user is advised to place the STRING 
command at the very beginning of his program in a one-time-only 
"housekeeping" type routine. 
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BASE 


The command BASE=@ will cause array subscripts to begin with the 
number @. The command BASE=l1 will cause array subscripts to 
begin with the number 1 which is the default value. To conform 
to the proposed ANSI standard, the BASE command may be entered in 
the format: OPTION BASE=. 


HOME 


The HOME command will send the home-up and clear-to~end-of-frame 
sequence to the output device. Appendix F contains the location 
of where this string is located to allow you to change this to be 
compatable with your system. 


SKIP 


The SKIP command is used to skip X print lines. SKIP eliminates 
the need to use multiple PRINT statements. 'X' must be a decimal 
value between 1 and 255. This command sends BASIC's carriage 
return line feed sequence to the output device. Appendix F gives 
the location of this sequence for your reference and 
modification. 


WAIT 


The WAIT command provides the user with an easy way to program 
wait loops. 'X' is a decimal value between 1 and 255, The 
length of time represented by the value 1 is dependent upon the 
the speed of the user's processor (usually between .5 and .9 
seconds). A WAIT loop can be interrupted by the BREAK command, 


RJUST 


The value of 'X' in the command RJUST=X is the number of print 
positions to the left of the decimal point when printing a 
number. Leading zeros in the field are printed as blanks. 


SAVING AND LOADING BASIC PROGRAMS 


SSB BASIC was written to allow for convenient use of the BFD-68 
disc system. This section describés how to save and load 
Programs with the disc system. Also, cassette commands are 
included to provide an easy transition to disc files. 
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SAVE 


This command is used to save programs to disk. To save a file, 
the user can type either SAVE "filename" or SAVE followed by a 
carriage return. BASIC will prompt you for the file name if you 
did not enter it. 


LOAD 
This command is‘used to load a program from disk. The format of 
this command is the same as for SAVE. 

APPEND 
This command also loads programs into memory as does LOAD except 
that the current contents of memory are not cleared out. The 


program which is loaded is "appended" (added) to the end of the 
program already in memory. 


CHAIN 


The CHAIN command allows one BASIC program to call another BASIC 
program. The called program will automatically begin execution. 
The format of the CHAIN command is the same as SAVE and LOAD. A 
practical example of the use of the CHAIN command would be to 
have a master program call various selected programs which chain 
back to the master program after execution. 


TSAVE 


The TSAVE command allows the user to dump the current BASIC 
program to cassette tape. The TSAVE command is similiar to the P 
command of MIKBUG - punch on/off commands are automatically sent 
to the recording device. The cassette interface can be used in 
either a manual or automatic motor control mode. If in the 
Manual mode, the recorder should be turned on prior to pressing 
carriage return, after typing the MTSAVE command. TSAVE will 
output the entire BASIC source buffer onto the recording device. 
The source buffer in memory is unchanged by the TSAVE command. 


TSAVE allows a single letter file name to be entered in the 
following format: TSAVE D or TSAVE #3 D. This letter will be 
output to the tape ahead of the source program. 


TLOAD 


The TLOAD command allows for the entering of previously recorded 
BASIC programs from cassette tape. The TLOAD command is similiar 
to the L command of MIKBUG - reader on/off commands are 
automatically sent, and either manual or automatic motor control 
can be used on the cassette interface. Typing TLOAD, followed by 
a carriage return, will transfer the source program from tape to 
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the BASIC source buffer. The buffer is automatically cleared at 
the beginning of a TLOAD command, 


If TLOAD is used with the filename option (TLOAD D or TLOAD #3 D) 
only a source program with that file name will be loaded, If a 


file name was not specified, the first source program encountered 
will be loaded. 


TPEND 


The TPEND command is identical to the TLOAD command except that 
the current BASIC buffer is not cleared. 


The TSAVE, TLOAD, and TPEND commands can all be used to work with 
any port. If, for example, your cassette recording device is on 
the ACIA port two, a TSAVE #2 command would be used. 


NOTE: If your cassette interface does not have automatic motor 


control, you will have to manually turn the motor on and off when 
using the above commands. 
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ARITHMETIC OPERATORS 


BASIC performs addition, subtraction, multiplication, division, 
and exponentiation. Mathematical expressions are evaluated from 
left to right using the following operator precedence. 
Parentheses may be used to override this normal precedence of 
operators. 


1) Exponentiation 

2) Negation 

3) Multiplication and division 
4) Addition and subtraction 


The mathematical operators are symbolized as follows: 
. Exponentiation (up arrow character) 
Negate (unary minus) 

Multiplication 

Division 

Addition 

Subtraction 


1+N #1 


No two mathematical operators may appear in sequence, and no 
operator is ever assumed. For example: 


19 C = A++B 
28 (A+2) (B-3) are not valid. 


NOTE: Exponentiation with negative numbers will give 
upredicatable result. 


RELATIONAL OPERATORS 


The following relational operators are used to compare _ two 
values. They may be used to compare arithmetic expressions or 
strings in an IF--THEN statement. 


Equal 

Not equal 

Less than 

Greater than 

Less than or equal 
Greater than or equal 


VANV AAI 
Vv 


nou 


Examples: 
19 IF X = Y THEN 329 


20 IF Q > R THEN PRINT Q 
30 IF A >= Z THEN GOSUB 168 : GOTO 2092 
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FUNCTIONS 


Functions are not to be confused with commands. Functions may be 
used aS expressions or as parts of expressions. Function 
arguments must be enclosed between parentheses. 


PEEK 


PEEK(X) returns the decimal value contained in the memory 
location specified by the decimal number xX, For example, the 
statement Z=PEEK (194) will assign to 2% the value of the 
contents of memory location 194 (hex C2). 


PI 


PI returns the decimal value 3.14159265. It may be used in any 
arithmetic expression. The PI function has no arguements, 


RND 


RND(X) generates a set of uniformly distributed random numbers. 
There are two ways in which RND can be used, 1) If X=@, then a 
different random number between 9% and 1 will be returned each 
time RND(X) is used. 2) If X is not @, then the same random 
number will be returned each time RND(X) is used. If no argument 
is used then X=§ is assumed. To yield random numbers within a 
range other than @ to 1 use the following: 


19 PRINT ((J-I+1) *RND (@) +I) 


where the range of numbers is to be I through J. 


TAB 


TAB(X) moves the print position to the Xth position to the right 
of the left margin. If the print position is already to the 
right of the Xth position then no action is taken. The left-hand 


margin is print position #1. For example, to print A$ starting 
in column 25: 
22@ PRINT TAB(25); AS 


The following function illustrates how a table of values can be 
printed with the right-hand column aligned: 


16@ DEF FNA(J) = LEN(STRS$ (INT (J) )) 
200 PRINT TAB (25-FNA(J))3J 
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INT 


INT(X) returns the greatest integer value which is less than xX, 
For example: 


INT(8.9) returns 8 
INT (-7.2) returns -8 
ABS 


ABS(X) returns the absolute value of the expression X,. For 
example: 


ABS(6.27) returns 6.27 
ABS (-6.27) returns 6.27 
SGN 
SGN(X) returns the sign (+ or -) of X. Examples: 
SGN (2.3) returns 1 
SGN(-2.3) returns -l 
SGN (@) returns @ 
SGN (-@) returns @ 
POS 
This function returns the present column number of the print 
head. In fact, POS is the inverse of the TAB function. For 
example: 
1@ PRINT TAB(1)?; X; 
20 IF POS = 71 THEN PRINT A$ 
LEN 


LEN(X$) returns the number of characters currently in the string 
represented by X$. Example: 


LEN("EXAMPLE") returns 7 


ASC 


ASC(X$) returns the decimal ASCII numeric value of the first 
ASCII character within the string. For example: 


ASC ("?") returns 63 
ASC ("A") returns 65 
ASC("ABC") returns 65 
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CHRS 


CHRS$(X) returns a single character string equivalent to the 
decimal ASCII numeric value of X. CHRS$ is the inverse of the ASC 
function. Example: 


CHR$(63) returns ? 
CHRS(65) returns A 
VAL 
VAL(X$) returns the numeric constant equivalent to the string x$, 
VAL is the inverse of the STRS function, An error will occur if 
X$ is non-numeric, Examples: 


VAL ("5E4") returns 5900 
VAL("17.8") returns 17.8 
STRS 


STR$(X) returns the string value of a numeric value. STRS is the 
inverse of the VAL function. Example: 


18 LET G = 4918 + 2 
26 LET M$ = STRS(G) 


The variable MS would contain "4929", 


LEFTS 


LEFT(X$,N) returns the string of characters from the left most to 
the Nth character of X$. For example: 


"BIG BROWN COW" 
LEFTS (WS,5) 


16 LET ws 
26 LET AS 


The variable A$ now contains the string "BIG B". 


RIGHTS 


RIGHTS (X$,N) returns a string of characters from the Nth position 
to the left of the right most character through the right most 
character. For example: 


10 LET Ps 
20 LET AS 


"BIG BROWN COW" 
RIGHTS (P$,5) 


The variable S$ now holds the string "N COW". 


-16- 


o. 


SSB BASIC 


MIDS 


MIDS (A$,X,¥) returns a string of characters from the string 
variable A$ beginning with the Xth character from the left and 
continuing for Y¥Y characters from that point. Y is optional. If 
Y is not specified, then the string returned is from the Xth 
character to the right of the beginning of the string through the 
end of the string. For example: 


16 LET P$ 
20 LET AS 


"RED, BLUE,GREEN" 
MIDS (P$,3,19) 


ou 


The variable A$ now contains the string "D,BLUE,GRE" 


IMOD 


IMOD(X,¥) returns the integer remainder of dividing X by Y. 
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TRANSCENDENTAL FUNCTIONS 


Accuracy for the following mathematical functions is retained to © 
seven significant digits. The accuracy of the seventh digit is \ 
not guaranteed, The arguments of SIN, COS, and TAN are in 


radians rather than degrees, 


FUNCTION EXPLANATION 


SIN (X) Returns the sine of X 

COS (X) Returns the cosine of X 

TAN (X) Returns the tangent of xX 

ATAN (X) Returns the arctangent of X 

LOG (X) Returns the natural logarithm of xX 

EXP (X) Returns 2.718282 (e) to the Xth power. 
The inverse of LOG(X). 

SQR(X) Returns the square root of X 


USER 


The USER function is provided to allow the programmer to jump to 
a user defined subroutine from a BASIC program. The statement 
LET A = USER (X) transfers program control to a user written 
machine language program. Program control branches to the memory 
location pointed to by memory locations $28 and $29, X is a 
numeric expression which is then stored in a 7-byte series 
beginning at a memory location pointed to by $39 and $31, This oO 
value may be modified by the user written machine language 
program to act as a data output from the program or as an 
indicator that something must be done. The user routine must 
terminate with a $39 (RTS), thereby transferring control back to 
the BASIC interperter. Additionally, X is now set equal to the 
value stored in the seven byte series stored in Memory locations 
pointed to by $39 and $31, 


When BASIC is loaded, memory locations $28 and $29 point a 
location containing an RTS ($39) so that if the user function is 


called it simply returns control to the BASIC interperter,. You 
must modify memory locations $28 and $29 using POKE or MON 


command in order to take advantage of the USER function. 
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STATEMENTS 


This section describes statements which can be used in BASIC 
programs. 


POKE 


POKE(X,Y) stores the value of Y at location X (both X and Y are 
decimal values). This allows the user to modify specific memory 
locations during program execution. Extreme caution should be 
taken while using this statement. It is very easy to 
accidentally modify the BASIC interpreter itself which would 
cause the program, the data, and the interpreter to be destroyed! 


DIM 


The DIM (dimension) statement allows the user to explicitly 
define the size of an array. An array is a collection of 
subscripted variables or strings. .One and two dimensional arrays 
are allowed with a maximum size of 256 X 256 elements, The DIM 
statement initializes all elements within the array to zero. 


An array can only be "dimensioned" once in a program, but need 
not be dimensioned at all. If a subscripted variable is 
encountered prior to dimensioning, a default of 18 elements’ is 
established for the array. Only the variables A - Z followed a $ 
may be dimensioned for string arrays. The maximum dimension size 
is 255 - which will provide an array that has 256 variable 
proisitons when BASE=8 and 255 positions when BASE=l. When 
processing under BASE=9, there is always one (1) more position in 
the array than the DIM size. 


Examples: 
18 DIM X(3@) assigns 38 memory spaces to array X 
(room for 3@ numeric variables) 
28 DIM Z (12,3) dimensions a 12 X 3 array for 2 
3@ DIM AS$(155) defines a 155 element string array 
(room for 155 strings each of 
maximum string length) 
REM 


The REMark statement is a nonexecutable statement which gives the 
user the ability to document his program. By including remark 
statements with the program source the listing becomes more 
readable, 
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DEF 


DEF FNA(X) allows the user to define his own functions. The 
letter "A" can be any letter of the alphabet and the variable xX 
must be a non-subscripted variable. Once defined, the function 
FNA(X) can be used anywhere in’ the program just like any other 
BASIC functions. A function must be defined before a _ reference 
is made to it. 


DATA AND READ STATEMENTS 


Data and read statements are used together to assign values to 
variables within a program. Every time a data statement is 
encountered, the values in the argument field are assigned 
sequentially to the next available position of a data buffer. 
All data statements, no matter where they occur in a program, are 
combined into a continuous list. 


READ statements cause values in the data buffer to be accessed 
sequentially and assigned to the variables named in the READ 
statement. They start with the first data element from the first 
data statement, then the next element, and so on to the end of 
the first data statement, and then to the first element of the 
second data statement, etc. Each time a READ command is 
encountered, it reads the next data value that has not been 
assigned to a variable. If a READ is executed and the data 
statements are out of data, an error is generated. 


Numeric and string data may be intermixed, However, they must be 
used in the appropriate order to assign the data to the 
appropriate variables. DATA and READ statements may be placed 
anywhere within the program. 


String data need not be enclosed in quotes since the comma acts 
as the delimiter. However, if the string contains a comma, then 
it must be enclosed in quotes. For example: 


1@ DATA JANUARY ,17,1973 
28 DATA "SMITH, BOBBY",5 
36 READ M$,D,Y,N$ 


4® READ A 
The statements shown above are equivalent to the following: 


16 LET M$ = "JANUARY" 

29 LET D = 17 

38 LET Y = 1973 

40 LET NS = "SMITH, BOBBY" 
5@ LET A = 5 
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RESTORE 


The RESTORE statement causes the data buffer pointer (which is 
advanced by execution of READ statements) to be reset to the 
beginning of the data buffer. For example: 


18 DATA ALVIN,17,KAREN,22 
28 READ AS$,A,B$,B 

38 RESTORE 

4@ READ C$,C 


is equivalent to: 


19 LET AS = "ALVIN" : A = 17 
26 LET BS = "KAREN" : B = 22 
39 LET C$ = “ALVIN" : C = 17 


LET 


The LET statement is used to assign a value to a variable. The 
use of LET is optional unless the statement is being executed in 
the immediate mode. In the immediate (or direct) mode, the LET 
is required. For example, the statement LET B=18%8 is the same 
as the statement B=109. 


The equal sign does not mean equivalence as in mathematics, but 
rather the replacement operator, It means: replace the value of 
the variable name on the left with the value of the expression on 
the right side of the equal sign. The expression on the right 
can be a simple numeric value or an expression composed of 
numerical values, variables, mathematical operators, or 
functions. 


FOR -~~ NEXT STATEMENTS 
The following is the format of the FOR - NEXT group of 
statements: 


16 FOR Er = eea TO eee STEP eee 


28 
36 
46 NEXT I 
The FOR - NEXT statements are used together for setting up 


program loops. A loop causes the execution of one or more 
statements for a specified number of times before exiting from 
the loop. The variable in the FOR statement (snown above as "I") 
is initially set to the value of the first expression. 
Subsequently, the statements following the FOR are executed. 


Pe a 
When the NEXT statement is encountered the STEP value is added to 
the variable and program execution is resumed at the statement 
following the FOR - TO statement. If the addition of the STEP 
results in a sum greater than the expression that follows TO, the 
NEXT instruction executed will be the one following the NEXT 
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statement. If no STEP is specified, the value of 1 is assumed, 
If the TO value is less than the initial value, the FOR -— NEXT 


loop will be executed only once. For example: 


19 FOR K=1 TO 3 STEP .5 
20 PRINT K; 

30 NEXT K 

49 PRINT "DONE" 


This example will print: 1 1.5 2 2.5 3 DONE 


Although expressions are permitted for the initial, final, and 
step values in the FOR statement, they will be evaluated only 
once (the first time the loop is entered). The same index 
variable cannot be used in two different loops if the loops are 
nested together. When the statement after the NEXT statement is 


executed, the variable is equal to the last value assigned, i.e. 
the value which caused the loop to stop. 


STOP 


The STOP statement causes the program to halt execution. BASIC 
returns to the command mode and prints "BASIC#". The STOP 
statement differs from the END statement in that it causes BASIC 
to display the statement number where the program stopped. The 
program can be restarted by executing a GOTO or a CONT command, 
The message displayed is STOP XXXX where XXXX is the line number 
where the program stopped. STOP is often used as a debugging 
aid. 


END 


The END statement causes the program to stop executing. BASIC 
returns to the-command mode and prints "BASIC#". END may be used 
more than once and need not used at all. 


GOTO 


The GOTO statement is an unconditional branch which directs the 
program flow to the statement number specified. Note that the 
statement number may specified as being the contents of a numeric 
variable or expression, 

Examples of GOTO: 


186 GOTO 19 

200 LET L=59@ : GOTO L 

GOTO 1088 (direct mode execution) 
GOTO I*188 
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GOSUB AND RETURN 


The GOSUB statement causes the program to branch to a specified 
statement number. It is assumed that this statement number is 
the start of a subroutine. The sequence of statements which make 
up the subroutine must be terminated with a RETURN statement in 
order to send the program back to the statement following the 
original GOSUB statement. 


A subroutine is a sequence of instructions which need to be 
executed more than once in a BASIC. program. To use such a 
sequence, a GOSUB instruction is employed. Upon completion of 
the subroutine, control is returned statement following the GOSUB 
by execution of the RETURN statement, 


A subroutine may use a GOSUB to call another subroutine which in 
turn may call another subroutine, and so on. This process is 
referred to as "nesting". Subroutine nesting is limited to eight 
levels. 


Example of the use of GOSUB and RETURN: 


18 T = 6 

28 P = 3.58: GOSUB 198: PRINT C 
36 P = 5.09: GOSUB 10%: PRINT C 
49 PRINT "TOTAL ",T 

58 END 

168 C = P * 1.86 

116 T=T+C 

128 RETURN 


This program would output: 


3.71 
5.38 
TOTAL 9.91 


ON _N GOTO OR ON N GOSUB 


This statement causes the program to branch to a specified 
statement number depending upon the value of N. N may be an 
integer value or may be an expression. If it is an expression, 
the expression will be evaluated, truncated to an integer, and 


the program will then branch to the Nth statement number. For 
example: 


228 ON N GOTO 788,350,498,459 


This means: 


If N = 1 GOTO 7866 
If N = 2 GOTO 359 
If N = 3 GoTO 498 
If N = 4 GOTO 45g 
If N > 4 an error will result 
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IF --- THEN 


The IF statement is used to control program execution depending 
upon specified conditions. If the relational expression after 
the IF is true, then the program performs the statement after the 
THEN. If the conditional after the IF is false, program 


execution continues with the statement on the next line after the 
IF --- THEN statement. The statement after THEN may be just a 


line number, which will cause program execution to GOTO the line 
specified. All multiple statements on the same line as an IF -~ 
THEN will be executed if the relationship tested true. 


For example: 
1@ IF A=5 THEN GOSUB 190: GOTO 238 


This statement will perform the GOSUB and then will GOTO 2398 when 
A is equal to 5. 


The logical operators "AND" and "OR" are not supported in this 
version of BASIC but may be easily handled using the IF -- THEN 


statement. 


To perform: 

IF A=B AND C=B THEN 199 
use the following: 

IF A=B IF C=D THEN 199 


To perform the functions 

IF A=B OR C=D THEN 189 
use the following: 

IF A=B THEN 198 

IF C=D THEN 190 


INPUT/OUTPUT STATEMENTS 


Any INPUT or PRINT statement may be followed with an #N where N 
is the I/O port number (8-7). N may be a constant, variable, or 
an expression. If no port number is specified, the control port 
(port #1) is assumed. If any instruction follows the port 


number, it must be separated by a comma. For example: 


736 INPUT #2, AS 
229 PRINT #4, X, Y, @ 


INPUT 


The INPUT statement allows the user to enter either numerical or 
string data on the terminal during program execution, For 
example, statement 10 INPUT X allows one numeric value to be 
entered. The statement 198 INPUT xs allows one string value, 
having up to the maximum number of characters as specified by the 
string length command, to be entered, The values input are 
assigned to the variables specified in the INPUT statement, 
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Multiple inputs can be entered by separating them by commas. If 
the expected number of values are not entered, a "?" will be 
generated. The statement 19 INPUT "ENTER VALUE",X will print 
the message inside the quotes, then prompt with a "?", and wait 
for the input of the variable requested, 


When the program comes to an INPUT statement, a "?" is displayed 
on the terminal. The program then waits for the user to respond 
by entering the requested data followed by a carriage return. 


If insufficient data is entered, the system then prompts the user 
with another "?", If no data is entered, or a non-numeric 
character is entered when a numeric variable is required, the 
system will prompt the user with "RE-ENTER", 


PRINT 


The PRINT statement directs BASIC to print either the value of 
the expression, literal values, string values, or text strings on 
the terminal. The various forms of print requests may be 
combined on a single statement and separated by commas or by 
semi-colons. If the statement is terminated with a semicolon, the 
line feed/ carriage return sequence (which is normally issued by 
BASIC automatically at the end of each print statement) will be 
suppressed and the next print statement will resume printing on 
the same line where the last print left off, 


Examples: 

16 PRINT Skip a line 

29 PRINT A,B,C Print variables A, B, and C auto- 
Matically tabbed into 16 
character fields 

36 PRINT A; B; C Print A, B, and C with only 
one space separating them 

46 PRINT "FOR SALE" Print a message 

5@ PRINT "TOTAL=";A Print the message followed by the 
value of variable A 

60 PRINT #4,X Print the value of X on I/O port 4 


OPEN 


The command OPEN #(FLN),(FILE SPEC) is used to open a disc 
file. The file number, (FLN), is an expression that must evaluate 
to the range ® through 9. The file specification, (FILE SPEC), 
must be string variable or string literal which supplies the file 
name in standard DOS68 format. 


The type of file access (read or write) will be determined by the 
first usage of the file after opening. Before a BASIC program 


can read input or write output to a file, the file must have 
previously been opened by the OPEN statement. 


Multiple files may be opened with the same OPEN. statement by 
using variables for (FLN) and (FILE SPEC) and repeating the 
series of statements. For example: 
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16 INPUT “NUMBER OF FILES",F 
20 FOR I =1TOF 

36 INPUT "FILE NAME",FS$ 

46 OPEN #1,F$ 

5@ NEXT I 


CLOSE 


The command CLOSE #(FLN),#(FLN),... is for closing open files. 
The file number may also be an expression as with OPEN. The 
specified file number must have previously been opened by an OPEN 
statement. Example: 


108 CLOSE #1, #2 


READ 


The statement READ #(FLN),(VARIABLE LIST) is provided to 
request data be read from a disk file. Input from a file is 
taken an item at atime - as the program needs it. (VARIABLE 
LIST) consists of one or more variables, either string or 
numeric, Separated by commas. If the receiving element is a 
string variable, it will receive the data from the file up to the 
maximum string length of 898 characters. The line input buffer 
for a single item from a file is 88 characters. 


A string .item over 8% characters will be truncated, and if more 
then 8@ characters are contained in a single item of input, the 
buffer input processing will be terminated. 


If the receiving element is a numeric variable, the input is 
scanned for a break character (a comma or a null) and that 
portion of the input - up to the break character - is then 
processed by a validation routine which verifies the number as 
being a valid numeric variable. If the number is invalid, Error 
#3 (ILLEGAL CHARACTER) will occur. 


RESTORE 


The statement RESTORE #(FLN) ,#(FLN) ,eo. causes’ the files 
associated with the list of file numbers to be repositioned to 
the beginning of the file. Thus, the data in the file may be 
reread. Note that this statement functions for files just as the 
RESTORE dscribed earlier functions for DATA statements. The file 
number may be that of file which is open for reading (input) or 
writing (output). 

16 OPEN #1,"PART.MST" (Quotes are not required) 

2@ LET C = 5 

3@ READ #1,A 

49 FORI=1fTOA 

5@ READ #1,B 

68 PRINT B 

70 NEXT I 
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89 RESTORE #1 

98 LET C=C-1 

106 IF C <> @ THEN 36 
118 CLOSE #1 

126 END 


The above program causes File #1 named "PART.MST" to be opened. 
A counter (C) is set to 5 to keep track of the number of times we 
go through the file. The first item is read in from the the file 
and in expected to hold the number of items to follow. Data is 
read and printed until the item limit is reached. The file is 
then restored (rewound). The count, C, is decremented and if the 
result is not @ the process is repeated until the count does 
become @ in which case the file is closed and the program ended. 


This example could be adapted to listing a file just created, 
The RESTORE after the write sequence will close the file, rewind 
the file, and open the file for reading. 


SCRATCH FILE 


The SCRATCH statement is used to remove an existing file from the 
current disk directory and then re-enter it into the directory. 
After the file is re-entered into the directory it is opened for 
output (writing). The old file is lost from the disc and a new 
file with the same name is prepared to receive data. A file that 
has been opened for input (read) cannot be scratched until it is 
closed and then reopened. 


18 OPEN #1,"FILE.RND" 
28 SCRATCH #1 

39 FOR I=1 TO 18 

49 WRITE #1,RND (8) 

5@ NEXT I 

6® RESTORE #1 

7@ READ #1,I1 

80 IF STATUS #1 = 6 THEN 118 
9@ PRINT I 

186 GOTO 76 

11@ CLOSE #1 

128 END 


This program opens a file called "FILE.RND" and clears out all 
existing data with the scratch command. Then it writes ten 
random numbers to the file, closes it, and then re-opens the file 
for reading with the RESTORE statement. The random numbers are 
read and printed until the end of file is encountered (STATUS = 
6) at which time the file is closed and the program ends, 
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WRITE 


The statement WRITE #(FLN),(VARIABLE LIST) allows the writing 
of the data indicated in the variable list to a disc file. The 
variable list may contain either string, or numeric variables, 
separated by commas. An error will occur on the first execution 
of the WRITE command if the file specified currently exists on 
the disk. To insure the availability of the file write access, 
use the SCRATCH command which will prepare the file to receive 
the output. 


STATUS 


STATUS #(FLN) is a function allowing for monitoring of error 
status of any specified file number. The status most often used 
is the end-of-file (EOF) which has a value of 6, The status 
number is that number returned by the disc file management 
system. Refer to the BFD-68 SYSTEM MANUAL for other values. It 
is a good idea to check the file status after a READ at least for 
end of file. If STATUS of a file is checked after opening, but 
prior to reading or writing, the absence or presence of the file 
may be established without getting a Basic Error (if the file 
were not there). A STATUS of zero (%) means the file is there 
and non-zero means not there. 
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AUTO RUN 


It is possible for the user to save a copy of BASIC along with 
the source of a BASIC program and RUN or call, as a transient 
command, the saved file and have it immediately begin execution. 
The transfer address for AUTO RUN is $6196, the first loaction to 
save is $0000, and to determine the last address to save, examine 
locations $@622 and $6023, 


Thus, the steps to make an auto-run file are: 
1) Load BASIC and create (or load in) the file to be auto-run. 
2) Type DOS to exit to the operating system. 


3) Use the resident ROM Monitor (MIKBUG, SMARTBUG, ...) 
to examine locations $@@22 and $9023. 


4) Restart DOS68 by the warm start entry point 


5) Type: 
SAVE,<auto-run file name>,@,<contents of $22, and $23>,166 
(To make the file a transient file, add ",$" following 196). 


6) The auto-run file is now ready to run 
RUN, <auto-run file name> 
or 
<auto-run file name> if the ",$" was used 


If you append the auto-run file onto a copy of DOS68, then you 
can have Basic come up running as part of your DOS BOOT. 
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COMMANDS FUNCTIONS STATEMENTS 
(used in direct mode) (used in programs) 
APPEND PORT ABS PEEK DATA #ON GOSUB 
CONT RUN ASC PI #DIM #ON GOTO 
DOS SAVE ATAN POS END #POKE 
DIGITS *STRING CHRS$ RIGHTS FOR-NEXT #PRINT 
FLIST TLOAD cos RND #GOSUB READ 
*LINE TPEND DEF SGN #GOTO REM 
*LIST *TRACE OFF EXP SIN #IF-THEN RESTORE 
LOAD *TRACE ON INT SOR INPUT RETURN 
*MON TSAVE LEFTS STRS #LET STOP 
NEW LEN TAB USER 
LOG TAN 
MIDS VAL 
* commands that can # statements that can 
be used within a be used in the direct 
program mode of execution 


DISK FILE COMMANDS: 


OPEN CLOSE RESTORE SCRATCH READ WRITE STATUS 


MATHEMATICAL OPERATORS RELATIONAL OPERATORS 

*  Exponentiation = Equal 

- Negation <> Not equal 

* Multiplication < Less than 

/ Division > Greater than 

+ Addition <= Less than or equal 

- Subtraction >= Greater than or equal 


PRECEDENCE OF OPERATORS 


(1) Exponentiation 

(2) Negation 

(3) Multiplication or Division 
(4) Addition or Subtraction 


APPENDIX B: 


ASCII CNTL HEX 


NUL 


+ SR = wc HE 
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4) 
61 
02 
83 
04 
05 
86 
07 
88 
69 
OA 
0B 
6C 
OD 
OE 
OF 
18 
ll 
12 
13 
14 
15 
16 
17 
18 
19 
1A 


DEC 
68 
G1 
82 
63 
64 
05 
86 
87 
08 
89 
19 
11 
12 
13 
14 
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CHARACTER CONVERSION TABLE 


ASCII HEX 


2C 
2D 
2E 
2F 
36 
31 
32 
33 
34 
35 
36 
37 
38 
39 
3A 
3B 
3C 
3D 
3E 
3F 
49 
41 
42 
43 
44 
45 
46 
47 
48 
49 
4A 
4B 
4c 
4D 
4E 
4F 
58 
51 
52 
53 
54 
55 
55 
57 


DEC 
44 
45 
46 
47 
48 
49 
58 
SL 
52 
53 
54 
55 
56 
57 
58 
59 
68 
61 
62 
63 
64 
65 
66 
67 
68 
69 
76 
71 
72 
73 
74 
75 
76 
77 
78 
79 
88 
81 
82 
83 
84 
85 
85 
87 
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DEL 


ASCII HEX 
58 


59 
5A 
5B 
5C 
5D 
5E 
5F 
69 
61 
62 
63 
64 
65 
66 
67 
68 
69 
6A 
6B 
6C 
6D 
6E 
6F 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
7A 
7B 
7C 
7D 
7E 
7F 


DEC 
88 


89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

108 
161 
162 
163 
104 
185 
106 
167 
108 
169 
119 
lll 
112 
113 
114 
115 
116 
117 
118 
119 
1298 
121 
122 
123 
124 
125 
126 
127 
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APPENDIX E: 


8630 


6628 
9928 


CHOD 


CHOB 


C083 


CH85 
CHO8 
COBA 
C@GC 
COOF 


ca 


7E 


74) 


CB85 


09 


C063 
38 
66 
CHO3 


EXAMPLE FOR USER FUNCTION 


* 
* 
* 
* 
* 
* THE 'x' 
* 
* 
* 
* 
UPOINT EQU 
* 
ORG 
FDB 
* 
ORG 


* 
USTART JMP 
* 


THE FOLLOWING EXAMPLE OF HOW TO USE USER 
MULTIPLIES THE NUMBER 'X' GIVEN USER(X) 

BY TEN AND THEN RETURNS TO BASIC. NOTE HOW 
IS REFERENCED IN THIS PROGRAM - 
THIS IS THE MOST COMMON MISUNDERSTANDING 

ON HOW USER WORKS. 


$30 ADDR OF USER DATA 

$6928 ADDR OF POINTER TO USER PGM 
USTART SET UP POINTER TO USER PGM 
$COOG 

BEGIN 


* SAVE AREAS FOR USER PGM 


* 
ISAVE FDB 
* 


BEGIN STX 
LDX 
INC 
LDX 
RTS 


END 


My) 

ISAVE SAVE THE INDEX REGISTER 
UPOINT LOAD X W/ADDR OF USER DATA 
6,X INC THE EXPONENT BY 1 
ISAVE RESTORE THE INDEX REGISTER 


RETURN TO BASIC 


APPENDIX F: PARTIAL SOURCE LISTING 


6175 * 
8188 8176 ORG #100 
Gi77 * 
6106 BD @2A6 0178 BEGIN JSR START COLD START 
9163 BD OC3Si 9179 JSR RSTART SOFT START 
9166 7E BCSD 8186 JMP AUTOS RUTO RUN 
6181 * 
B189 28 73 Q182 BUFBAS FOB SRCBEG END OF BASIC & WORK AREAS 
6198 82 6183 CNTPRT FCB 2 CONTROL PORT 
B16C 60 88 6184 MEMMAX FOB $6990 MEMORY LIMIT - YMEMAX FOR DOS6s. 5e 
O81%E BB BD 8185 HOMSTR FDS HOMLIS HOME/CLEAR EOF 
6119 63 BA 6186 CRLFST FOB CRLFE CR/LF STRING 
0112 BD 2@R B18? ERRPNT FDB ERROR ADDR OF ERROR RTN ¢# IN ACCB)> 
@188 
0144 43 9189 NOTICE FCC “COPYRIGHT 1979 SMOKE SIGNAL BROADCASTING’ 
8199 »* 
81.4 43 08 8194 FOB $9000, $9809 RESERVED FOR FUTURE 
B140 &B 88 9192 FOB $6988, $9892 JUMP RDDRESSES 
0144 68 82 8193 FOB $6889, $6808 
@194 * 
0148 18 9195 DELINE FCB $18 cTL x 
6149 38 9196 DELCHR FCB $88 CTL H 
B14A 08 0197 BSECHO FCB $88 NULL 
914B 03 @198 BRKCHR FCB $3 CTL Cc 
8199 
82668 
6204 * I/O DEFINITION TABLE - CONFIGURATION BYTE 
G22 * 
6263 *BIT#! 7 | 6 | S$ |! 4 | St @ t 424 ft @ f 
8204 * H ' H H H H H { i 
@265 «HEX | 8@ | 40 {28 110 {| O8 | OF: B21: O14 
8266. 
B267 * CTL RES MPC PIA PIA STD x64 x16 
8288 * TERM CAS PIA IN OUT PIA SER SER 
8269 
6210 * CONFG = 9 -> NON-STD I/O Cie. Video Board - Graphics) 
242 
212 * LOGICAL UNIT TABLE ENTRY 
6213 
6214 * t) -> CONFIGURATION BYTE 
6215 * 1-2 -> ADDRESS OF I/O DEVICE 
216 * 3-5 <-> JUMP CHAR OUTPUT 
6217 * 6-8 -> JUMP CHAR INPUT 
6218 * 9-11 -> JUMP PORT INITIALIZATION 
8219 
e228 
9140 6221 LUTBLE EQU * 
6222 * 
@223 * LOGICAL UNIT #6 
224 « 
G14C 61 225 LUG FCB $01 
@14D F7 ES G226 FDS $F7EQ 
614F 7E @14FC @227 JMP CHROUT 
6152 7E e2eC e228 JMP CHRIN 
@155 7E O1AC O229 JMP ITOINIT 
8230 * 
0234 * LOGICAL UNIT #1 
232 * 


0158 O14 6233 LUL FCB $01 
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8159 
@15B 
B15E 
@161 


8164 
8165 
167 
B16A 


O16 ¢ 


Ou. 
PMO W 


0194 
B195 
0197 
019A 
919D 


B1AB 
QiAL 
BLAS 
@1AS5 
BLAS 


Poaty 


E4 

BLFC 
eeec 
Bi1ACc 


Es 

vec1 
7ace 
BLAC 


O1FC 


BLAC 


FS 

G4FC 
eeec 
BiAC 


Fc 

@1FC 
Be2eC 
@1AC 


0234 
8235 
@236 
8237 
6238 
92393 
8248 
O241 
8242 
6243 
244 
9245 
8246 


FOB 

JMP 

JMP 

SPP 
* 


SFTES 
CHROUT 
CHRIN 
LOINIT 


* LOGICAL UNIT #2 


* 
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CHGD TO YCPORT IF posés. 50 


ETC. PARAMETERS THAT 
*CHROUT’ IN BASIC & 


Lue FCB $81 

CTLADR FOB SF7ES 

CTLOUT JMP ZPUTCH *ke SEE NOTE BELOW 

CTLIN JMP 26ETCH *#he SEE NOTE BELOW 
SMP LOLINIT 

* 

* NOTE: TO HAVE BASIC’S CONTROL PORT NOT USE 

* THE WIDTH, DEPTH, 

C YOU HAVE SET FOR DOS -— CHANGE THE JUMP 

* AT CTLOUT TO GOTO 

* THE JUMP AT CTLIN TO GOTO ’“CHRIN’ 


©. * LOGICAL UNIT #3 


7 


[. LUZ FCB 


FOB 

JMP 

SMP 

JMP 
* 


$61 
$F7EC 
CHROUT 
CHRIN 
TOINIT 


* LOGICAL UNIT #4 


* 

LU4 FCB 
FOB 
JtMP 
JtMP 
JMP 

* 


$04 
SFCFB 
CHROUT 
CHRIK 
LOLTNIT 


* LOGICAL UNIT #5 


* 
LUS FCB 


* 


$04 
$F?F4 
CHROUT 
CHRIN 
IOINIT 


* LOGICAL UNIT #6 


me 

LUG FCB 
FOB 
JMP 
JMP 
JMP 


$04 
SF?FS 
CHROUF 
CHRIN 
LOINTIT 


* LOGICAL UNIT #7 


* 
LU? FCB 


$04 
$FCFC 
CHROUT 
CHRIN 
IOINIT 


aHcouT 


ZHCrT 
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Beng ; 
8295 * INITIALIZE I/O PORT AS SPECIFIED 
B296 ‘ 
BLAC DE 84 929? IOINIT LOX LUPTRX 
B1AE ES 68 e398 LOA B CONFG, X 
8188 EE 64 82939 LOX OPORT. & 
@1Be C4 SF 8389 AND B &S9F CLEAR NU BITS 
91684 2B i4 8361 BNI IGINTR CONTROL TERM 
6186 e?7 12 8382 BEG TOINTR OTHER TYPE IO 
g1B8 CS ic 8383 BIT B #411180 PIA TYPE 
B1BA 26 BF 8304 BRE LOPIA VES 
B1iBC 37 8385 PSH B 
B1iBD BD BF22 8206 JSR SELAYEL 
81098 33 @30? PUL B 
B1Ci 86 B3 9383 LOA A eS 
8103 A? BO 8389 STA A B.X MASTER CLEAR ACIA 
o1C05 86 14 8316 LBA A 8$14 WORD SELECT BITS 
gic? 18 O3iL RBA ADD DIVIDE SELECT 
8108 A? 09 0312 STA R BX 
B1iCA 39 9343 IOINTR RTS 
@iCR CS a4 9314 IOPIA BIT B #2189 STO PIA 
B1iCb ea? 13 O345 BEQ LOPIARA NO 
OLCF 6F 61 B316 CLR 4% INZT A AND B SIDES 
@1D1 6F 83 B327 CLR 3x 
O103 6F 68 0318 CLR GB, x 
B1D5 6F 2 G3L9 CLR 2, x 
B1D7 63 88 8328 COM 6, 
B1iD9 86 SE ase. LOA A &SZE 
O10B A? O41 e222 STA A AX 
B1iDD 86 2@E 323 LOA A &@SZE 
BLiDF A? BS 324 STA A 3.% 
OLE41 39 6325 RTS 
O1E2 CS 08 9326 IOPIAL BIT B #41898 OUTPUT PIA 
O1E4 27 8B O32? BEQ LOPIARe NO 
@1E6 6F B41 8328 CLR 4:% SET PIA A FOR OUTPUT 
BLES 86 FF 9329 LOR A 8-2 
BLER A? BB 9338 STA R OX 
O1EC 86 3E B33 LBA A &$SE 
B1EE AY BL 9332 STA A.4,K 
B1FO 39 ' @333 RTS 
OiFi 6F 61 6334 IOPIA2 CLR 1,% SET PIR A FOR INPUT 
O1F3 86 68 8333 LOA A #8 
B1iFS A? BB 8336 STA AR BX 
O1F? 86 2E G337 LDA AR #$2E 
O1F9 A? O41 8338 STA A 1% 
OiFB 39 8339 RTS 
93498 qn nn nnn nn nn enn en rn re enn 
63441 
9342 * DO CHARACTER OUTPUT 
8343 
@1FC 84 7F 8344 CHROUT CMP A #$7F 
OiFE 27 16 8345 BEQ CHROR 
9208 E6 80 O346 LDA B CONFG. X 
S202 27.12 0347 BEQ CHROR NO OUTPUT REQ‘’D 
B204 EE 01 348 LOX OPORT, X 
B206 CS ec 0349 BIT B #41198 PIA OUTPUT 
0208 26 BO 6258 BNE OUTPIA YES 
@2eA CS 63 B51 BIT B #444 ACIA OUTPUT 
B820C 27 88 8352 BEQ CHROR NO 


B20E E6 88 8353 LOA B @,X WAIT FOR TDRE 
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9218 
8212 
0214 
9216 
217 
8218 
B21A 
621.0 
B21E 
8228 


ARR aR rm 


8354 
e358 
0356 
Q357 
8358 
Q359 
8368 
B361 
8362 
8363 
9364 
8365 
8366 
8367 
6368 


CHROR RTS 
OUTPIR SEI 


xa 


> Db DUOWVOD 
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#2 
Hod 
1,% OUT CHAR 
LOCK INTERRUPTS 
a,% OUTPUT CHAR 
#$36 
4.x 
RS3ZE 
2. 
INTRP RESTORE INTERRUPT STATE 
4,% WAIT FOR CHAR TRANSFER 
*—2 
@. X CLEAR INTR FLAG 


« DO CHARACTER INPUT 


CHRIN LDA 8B CONFG, X 


BEQ 


INACIA LOA 


INECHO LOX 


INPIA BIT 


INPIAR2 LDA 


LDA 
CHRINR RTS 


B 
6 
B 
B 
A 
R 
A 


B 
B 
a 
B 
A 


CHRINR 

OPORT. ¥ 

416198 PIA INPUT 

INPIA YES 

#214 ACIA INPUT 

CHRINR NO 

B.% WAIT FOR RORF 
INACTIA 

1,% GET CHAR 

&$7F MASK PARITY 

SCF DEL CHAR 

INACIA YES, GET NEXT 
LUPTRX ECHO CHAR OUT - RTS FOR NO ECHO 
OFFOUT, X 

#4180 STD PIA 

INPIARS NO 

3% WAIT FOR INTR ON B 
= 2 

2.% READ B SIDE 

INECHO ECHO CHAR 

4,% WALT FOR INTR ON A 
INPIAREe 

Q, READ A SIDE 


NO ECHO, INPUT ONLY 
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e@25E 
Ba5F 
B26 
0262 
8264 
B266 
0269 
826A 
b26C 
B26E 
e276 
eere 
8274 
8276 
Be738 
327A 
jeer 
pe 


Orn. 


28 
289 
J28A 
8288 
B2eD 
B2eE 
8298 
b292 
8294 
B296 
B2298 
829A 
B29C 
B29E 
B82AB 
e2h2 
B2~A4 


@2A6 
e2A9 
G2AB 
e2AC 
@2RE 
92B1 
B82B3 
B2BS 
82898 
@2BB 
G2BE 
B2Cc1 
Bec4 
Bec6 
Bece 


B83 
B404 
Ba0S 
G406 
8487 
8488 
8489 
8410 
6444 
e412 
64413 
B414 
@445 
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* PROCESS CHECK FOR BREAK 


BREAK PSH 


BREAK® LDX 


BREAKL CHP 


BREAK2 LOX 


BREAKS LOA 


BREAK4 BIT 


BREAKS 6PL 
BREAKE6 LDA 
BRERK? LDA 


no oD 


TOSAVX 
LUBRKX 
CONFG, & 
OPORT, ¥ 
#4240411 
BREAKS 
S224 
BRERKS 
2190198 
BREAKS 
21.9008 
BREAK? 
BREAKS 
LUBRKX 
OFFIN, & 
BRKCHR 
BREAKe 
READY 
TOSAVX 


8. % 


BRERK2 
BRERK@ 
#2188 

BREAKG 


B 3.x 


BRERK2 
BREARK® 


USE DEFAULT PORT ONLY 


ACIA, PIA INPUT, MPC 


PIA INPUT 

YES 

MPC INPUT 

VES 

WRONG, CONFIGURATION TO BREAK 
GOTO INPUT PROCESSOR 


BRERK CHAR? 

NO 

STOP CYCLING 
RESTORE AND CONT 


ACIA PORT 


STB PIA 
NO 
CHECK B SIDE 


PIA INPUT ONLY’ 
CHECK SIDE A 
mpc PIA 


GO INPUT, HOPE MIKBUG INEEE 


* BASIC’S START-UP ROUTINE 


START LOA 


CNTPRT 
CONSOL 


INTRP 
YMONY 
#$52 
START4 
#READY 
YABRTY 
YCPORT 
CTLADR 
YMEMAX 
€$38 
START4 
MEMMAX 


CONTROL PORT# 


SAVE PROC STATUS 

DOS YERSION 

Is IT bo0sés. 5A 

NO 

BREAK RETURN ADDR 

STORE IN DOS BREAK ADDR 
PARAMETER TABLE CTL PORT ADDR 
SAVE IN PORT#2 JUMP TABLE 
PARAMETER TBL MEM LIMIT 

MIN MEMORY REQD FOR BASIC 


SAVE IN BASIC’S MEMMAX 


$8 BASIC REL 3.9 


@2CB 7F 81800 8462 
B2CE BD 167F 0463 
Bebs DE 81 O464 
8203 DF 83 Q465 
20S 7E BBBS o466 

O467 


B469 

8478 

O471 

AeDB AG BO 8472 
ARPA 8D BD B473 
t 0474 
fF 88 B475 
* 20 BC B476 
B47? 

“a 8D FS e478 
m2 FS B479 

i 


«y 28 9488 
i BE 484 
e48e 

8483 

6484 

8485 

dh 6486 
5 @F e487 
1 Re) e488 
Fat eA 8489 
eb be 8498 
pa? 6494 
e492 

0493 

494 

z 6495 
8496 
SE 497 
Bee 4498 
zw Th 8499 
: e599 
e501 

e562 

9583 

8504 

e595 

e506 

0507 

y 8508 
8589 

37E 0518 
@5411 


a4 


Ne 


+ VE 


oh sat 
vi 


CLR 
START4 JSR 

LOX 

STX 

JMP 
* 


* 


MEMMAX+L 
PORTCN 
LUPTRX 
LUBRKX 
NEW 


* OUT HEX RTN 


OUTH LOA A BX 


BSR 
LBA 
INX 
BRA 
* 
OUT2HS BSR 
BSR 
OUTSP LOR 
BRA 
* 
OUTHL LSR 
LSR 
LSR 
LSR 
OUTHR AND 
ADD 
CMP 
BLS 
ADB 
* 


R 


DDIDIIDDI 


R 


OUTHL 
B.% 


OUTHR 


OUTH 
OUTH 
#SPACE 
OUTCH 


* OUTPUT CHAR RTN 


* 

OUTCH PSH 
PSH 
JSR 
STX 
LOX 
JSR 
BRA 

* 


* INPUT CHAR 


* 
INCH STX 


PSH B 


LOX 
JSR 


PSH A 


JMP 


B 
a 


BREAK 
TOSAVX 
LUPTRX 
OFFOUT, X 
BREAKe 


RTN 
TOSAYX 


LUPTRX 
OFFIN, X 


BREAK1 
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FORCE BOUNDARY 
INITIALIZE CTL PORT 


10/726 


10726 


APPENDIX G: HOW TO REDUCE EXECUTION TIME 


l. 


2e 


3. 


4. 


Subscripted variables require considerable time; use 
non-subscripted variables whenever possible. 


The number of calculations involved in the transcendental 
functions (SIN, COS, TAN, ATAN, EXP, and LOG) make them 
Slow. Use these functions only when necessary. 


BASIC searches for functions and subroutines in the source 
file. Placing often called routines at the start of the 
program will reduce BASIC's search time. 


Variables are entered into the symbol table as they are 
referenced, BASIC then searches the symbol table each time a 
variable is used. Therefore, reference a frequently called 
variable early in the source program so that it comes near 
the front of the table. 


Numeric constants are converted each time they are 
encountered. If a constant is used often, it should be 
assigned to a variable and the variable name used instead. 


APPENDIX H: MEMORY USAGE IN BASIC 


1% 


2. 


3. 


4. 


6.0 


REM statements use space, so use them wisely. 


Each non-subscripted numeric variable uses 8 bytes, 
Each numeric array uses 6 bytes + 6 bytes for each element. 


If the default string length of 32 characters is used, each 
non-subscripted string variable uses 34 bytes and each 
string array uses 6 bytes + 32 bytes for each element. Use 
the STRING command to explicitly allocate the size you need. 


An implicitly dimensioned variable creates a 16 X 10 array. 
If you do not intend to use all 18 elements use the DIM 
statement to explicitly allocate only the space you need. 


Each BASIC line uses 2 bytes for the line number, 2 bytes 
for the encoded key word, 1 byte for the line length, 1 byte 
for the end of line terminator, plus 1 byte for each 
character following the key word. Reduce memory space by 
using as few spaces as possible. 


Each file number opened takes 177 bytes. Reusing the same 
file number (after the file closing) in subsequent OPEN 
statements will save allocation of new space when the old 
space is no longer required. 


SSB BASIC checks to find out if it is running with DOS68 
Version 5. If it is, the value that is in MEMMAX (DOS 
parameter table) is used for BASIC's memory limit. Since 
BASIC must start its stack on a page boundary, only the high 
order address byte is used. The low order byte in MEMMAX 
will be ignored and BASIC will always use @@ as the low 
order byte. 


APPENDIX I: DEFAULT VALUES ON SYSTEM INITIALIZATION 


The following table lists the default values of system parameters 
that are set on system initialization or on executing the NEW, 
LOAD, or CHAIN commands. 


TRACE is turned off. 

DIGITS is set to floating point mode. 
RJUST is set to floating point mode, 
STRING is set to 32. 

BASE is set to l. 


LINE is set to 64, 


APPENDIX J: MODIFYING LOGICAL I/O BASIC‘’S I/O 


The new LOGICAL I/O drivers in SSB BASIC makes the basic 
essentially self contained. All the BASICS reference SEGE3 


(control) and SA@98 (stack pointer) and the disk versions 
reference the DOS -- these are the only external references, 


The philosohy behind using logical I/O is that the user may 
easily modify the basic to interface to virtually any I/O device 
or to special machine language subroutines for features that are 
not included in the basic. The easiest way to get data into or 
out of basic is thru the I/O routines. This way, all of basic's 
edits are performed and data is normalized so that when 
referenced later by the program there will not be problems 
associated with invalid data (maybe bad data - but at least 
syntactically correct!) 


THE CONFIGURATION BYTE 


The following is a description of the available 
configurations in basic: 


$8X - Control terminal x* may be 8, 1, 2, or 4. The control 
terminal is not initialized. The “X° will determined 
the type of I/O that will perfromed. 


$49 - UNUSED 


$29 - If the user is still using an MP-C type of I/O card with 
either SWTBUG or MIKBUG the config byte should be set to 
$SA® (ctl port & mp-c) for logical unit 1 and the jumps to 
CHROUT and CHRIN change to OUTEEE and INEEE, 


$18 - Input only from a parallel device (either side of an MPL-A) 
$88 - Output only to a parallel device (either side of an MPL-A) 


$84 - Input (side b) and output (side a) on a parallel device. 
this is the way basic used the parallel I/O ports in 
the past. 
basic used the parallel I/O ports in the past. 


$02 - Serial I/O with X64 clock - this will select 119, 134.5 
308, 4800, 960% baud on the CHIEFTAIN microcomputers. 


$01 - Serial I/O with a X16 clock as used in the SWTPC 68060 
computer, and for the highest baud rates on the CHIEFTAIN. 


$@9 - Other - see table description for more information, 


ADDRESS OF I/O DEVICE 


Basic doesn't really care what address you assign to and I/O 
device. There is no longer an ERROR 26 in Basic - if there isn't 
an I/O device at the address you specify, you may lose control of 
Basic - so be very careful when modifying the I/O addresses. For 
the standard I/O types, Basic will assume a two byte location - 
ie. Basic supports Dual serial I/O cards and also both sides of a 
parallel card as individual I/O locations. 


LOGICAL I/O JUMP TABLE 


This is where you may use the ‘ports' of Basic for your own 
routines. If you speecify $09 for the configurator byte - Basic 
will do nothing in it's I/O routines, but all of the I/O jumps in 
the jump table are made. Thus if you modify the jump table to go 
to your own routines, you will be able to pass data to Basic 
using INPUT or PRINT, etc, or just go execute some code that you 
want exectued,. 


THE CONTROL PORT 


With DOS68 Version 5, the control port address will be 
picked up from the parameter table and will always be logical 
port 2. If you are not using DOS68 Version 5, the control port 
should be assigned to the port your operating system talks thru. 
For SWITBUG, this is 1 and for SMARTBUG it is 2. There are two 
locations that MUST be modified when changing the location of the 
control port. The first is CNTPRT which is located at $@10B - 
this is equal to the number of the port i.e., 1, 2, 3, 4 etc. 
The other location is configuration byte of the logical unit 
corresponding to the number that was put into CNTPRT. 


MODIFYING AND SAVING BASIC 


Prior to getting too involved in modifying Basic, the user 
should establish the size of Basic. The starting address for all 
verisons is $9188 and the transfer (execution beginning) address 
is $0108. The easiest way of getting a “safe' ending address is 
to memory examine locations $9169 and $@19A, which gives you the 
ending address of Basic and work areas. This is slightly greater 
than what really needs to be saved, but not by much. To get the 
exact location, SSB Disk users can ‘“FIND' the Basic PRIOR to 
loading it into memory ~ and take note of the address where the 
load ends. : 


After knowing the starting, ending and transfer addresses, 
make your modifications and then re-save the Basic. 


O100~L6 EY 
+A 0100 


